home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / cafe / ultslots.dir / 00269.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  551 b   |  21 lines
  1. on mouseDown
  2.   puppetSprite(32, 1)
  3.   set the memberNum of sprite 32 to the number of member "CNTRL DOWN.PICT"
  4.   updateStage()
  5.   if the memberNum of sprite 5 <> 0 then
  6.     set num to the memberNum of sprite 5
  7.     set QTname to the name of member num
  8.     if the controller of member QTname = 0 then
  9.       set the controller of member QTname to 1
  10.     else
  11.       set the controller of member QTname to 0
  12.     end if
  13.   end if
  14. end
  15.  
  16. on mouseUp
  17.   set the memberNum of sprite 32 to the number of member "CNTRL UP.PICT"
  18.   updateStage()
  19.   puppetSprite(32, 0)
  20. end
  21.